home *** CD-ROM | disk | FTP | other *** search
/ The Games Machine 76 / XENIATGM66.iso / Indiana Jones / Indiana Jones.exe / RESOURCE / PREVIEW.GOB / cog_teo_keyline.cog < prev    next >
Text File  |  1999-11-15  |  2KB  |  90 lines
  1. # Jones 3D Cog Script
  2. #
  3. # gen_MoveObj.cog
  4. #
  5. #
  6. # A hack for pushing blocks around. Inspired by Reed Derleth
  7. # 
  8. # IMPORTANT. Make sure you attach the cog to a valid object.
  9. # Make sure that the ghostthing is assigned to a ghost object.
  10. #
  11. # Usage:
  12. # -Get behind the object (face the direction you want it to go)
  13. # -Activate once to push forward.
  14. # -Activate twice rapidly to pull. (the object will materialise on top of you just walk forward)
  15. # -You can teleport things out of the world so be careful
  16. #
  17. # [SXC]
  18. #
  19. # (C) 1998 LucasArts Entertainment Co. All Rights Reserved
  20. # ========================================================================================
  21.  
  22. symbols
  23.  
  24.     message     startup
  25.     message     entered
  26.     message        taken
  27.     
  28.     sound       keyline
  29.     
  30.     sector      entersector
  31.     
  32.     thing       key
  33.  
  34.     vector      playervec           local
  35.  
  36.     thing       player0             local
  37.  
  38.     float       playery=0           local
  39.     float       playerx=0           local
  40.     int         check=0             local
  41.     int         keytaken=0          local
  42.  
  43. end
  44.  
  45.  
  46. # ========================================================================================
  47.  
  48. code
  49.  
  50. startup:
  51.     player0 = GetLocalPlayerThing();
  52.     return;
  53.  
  54. # ........................................................................................
  55.  
  56. entered:
  57.     if ((GetSenderRef() == entersector) && (GetSourceRef() == player0) && (check == 0) && (keytaken == 0))
  58.     {
  59.         playervec = GetThingLVec(player0);
  60.         playery = VectorY(playervec);
  61.         playerx = VectorX(playervec);
  62.  
  63.         if ((playery > 0) &&
  64.            ((playerx > -0.7) && (playerx < 0.7))) 
  65.         {
  66.             check = 1;
  67.                PlayVoice(player0, keyline, 1.0, 0); 
  68.         }
  69.     }        
  70.     return;
  71.     
  72. # ........................................................................................
  73.  
  74. taken:
  75.     if (GetSenderRef() == key)
  76.     {
  77.         keytaken = 1;
  78.     }
  79.     return;        
  80.     
  81.     end
  82.  
  83.  
  84.  
  85.  
  86.  
  87.  
  88.  
  89.  
  90.